<?php
    
    include_once '../../../../controlador/php/conexion/Conexion10.php';
    $con = new Conexion10();
    
    $ingreso = $_REQUEST['ingreso'];
            
    $sql = "select GENPACIEN.OID,GENPACIEN.PACNUMDOC, RTRIM(GENPACIEN.PACPRINOM)+' '+RTRIM(GENPACIEN.PACSEGNOM) AS NOMBRES, 
                   RTRIM(GENPACIEN.PACPRIAPE)+' '+ RTRIM(GENPACIEN.PACSEGAPE) AS APELLIDOS,
                   CONVERT(nvarchar(100),stuff((select '-' + CAST(SLNFACTUR.SFANUMFAC as varchar(100))
            FROM GENPACIEN LEFT OUTER JOIN ADNINGRESO ON GENPACIEN.OID=ADNINGRESO.GENPACIEN
                                                               LEFT OUTER JOIN GENDETCON ON ADNINGRESO.GENDETCON=GENDETCON.OID
                                                               LEFT OUTER JOIN SLNFACTUR ON ADNINGRESO.OID = SLNFACTUR.ADNINGRESO
                                                               LEFT OUTER JOIN GENTERCER ON GENDETCON.GENTERCER1 = GENTERCER.OID
            WHERE ADNINGRESO.AINCONSEC = '".$ingreso."' AND SFADOCANU <> 1
            for xml path('')),1,1,'')) NUMFACTURA,GENDETCON.GDENOMBRE,GENTERCER.TERNUMDOC
            from GENPACIEN LEFT OUTER JOIN ADNINGRESO ON GENPACIEN.OID=ADNINGRESO.GENPACIEN
                                                               LEFT OUTER JOIN GENDETCON ON ADNINGRESO.GENDETCON=GENDETCON.OID
                                                               LEFT OUTER JOIN SLNFACTUR ON ADNINGRESO.OID = SLNFACTUR.ADNINGRESO 
                                                               LEFT OUTER JOIN GENTERCER ON GENDETCON.GENTERCER1 = GENTERCER.OID
            WHERE ADNINGRESO.AINCONSEC = '".$ingreso."'
            group by GENPACIEN.OID,GENPACIEN.PACNUMDOC, RTRIM(GENPACIEN.PACPRINOM)+' '+RTRIM(GENPACIEN.PACSEGNOM), 
                   RTRIM(GENPACIEN.PACPRIAPE)+' '+ RTRIM(GENPACIEN.PACSEGAPE),GENDETCON.GDENOMBRE,GENTERCER.TERNUMDOC";
    $res = $con->query($sql) or die("error");
    
    while($resp = mssql_fetch_array($res)){
        $lista[] = array_map(utf8_encode,$resp);
    }
    
    print_r(json_encode($lista));
    
    $con->cerrarConexion();
    
    
?>
